#!/usr/local/bin/omf

# expects $1 type LIST
function take {
	if $1 == []
	    return [];

	return hd($1)::skip(tl($1));
}

# expects $1 type LIST
function skip {
	if $1 == []
	    return [];

	return take(tl($1));
}
